home *** CD-ROM | disk | FTP | other *** search
- object ColorForm: TColorForm
- Left = 335
- Top = 228
- BorderIcons = []
- BorderStyle = bsDialog
- Caption = 'Full screen background color'
- ClientHeight = 203
- ClientWidth = 327
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnShow = FormShow
- PixelsPerInch = 120
- TextHeight = 16
- object Label1: TLabel
- Left = 16
- Top = 9
- Width = 32
- Height = 16
- Caption = 'Color'
- end
- object Label2: TLabel
- Left = 128
- Top = 74
- Width = 27
- Height = 16
- Caption = 'Blue'
- end
- object Label3: TLabel
- Left = 187
- Top = 74
- Width = 37
- Height = 16
- Caption = 'Green'
- end
- object Label4: TLabel
- Left = 246
- Top = 74
- Width = 26
- Height = 16
- Caption = 'Red'
- end
- object HexLabel: TLabel
- Left = 36
- Top = 121
- Width = 49
- Height = 16
- Caption = '$000000'
- end
- object Label5: TLabel
- Left = 168
- Top = 121
- Width = 94
- Height = 16
- Caption = '0=min 255=max'
- end
- object Panel1: TPanel
- Left = 121
- Top = 16
- Width = 24
- Height = 25
- Hint = 'Black|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clBlack
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = Panel1Click
- end
- object Panel8: TPanel
- Left = 144
- Top = 16
- Width = 25
- Height = 25
- Hint = 'Gray|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clGray
- ParentShowHint = False
- ShowHint = True
- TabOrder = 10
- OnClick = Panel1Click
- end
- object Panel2: TPanel
- Left = 169
- Top = 16
- Width = 24
- Height = 25
- Hint = 'Maroon|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clMaroon
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- OnClick = Panel1Click
- end
- object Panel4: TPanel
- Left = 192
- Top = 16
- Width = 25
- Height = 25
- Hint = 'Olive|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clOlive
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- OnClick = Panel1Click
- end
- object Panel3: TPanel
- Left = 217
- Top = 16
- Width = 24
- Height = 25
- Hint = 'Green|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clGreen
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- OnClick = Panel1Click
- end
- object Panel7: TPanel
- Left = 240
- Top = 16
- Width = 25
- Height = 25
- Hint = 'Teal|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clTeal
- ParentShowHint = False
- ShowHint = True
- TabOrder = 9
- OnClick = Panel1Click
- end
- object Panel5: TPanel
- Left = 265
- Top = 16
- Width = 24
- Height = 25
- Hint = 'Navy|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clNavy
- ParentShowHint = False
- ShowHint = True
- TabOrder = 7
- OnClick = Panel1Click
- end
- object Panel6: TPanel
- Left = 288
- Top = 16
- Width = 25
- Height = 25
- Hint = 'Purple|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clPurple
- ParentShowHint = False
- ShowHint = True
- TabOrder = 8
- OnClick = Panel1Click
- end
- object Panel16: TPanel
- Left = 121
- Top = 41
- Width = 24
- Height = 24
- Hint = 'White|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clWhite
- ParentShowHint = False
- ShowHint = True
- TabOrder = 18
- OnClick = Panel1Click
- end
- object Panel9: TPanel
- Left = 144
- Top = 41
- Width = 25
- Height = 24
- Hint = 'Silver|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clSilver
- ParentShowHint = False
- ShowHint = True
- TabOrder = 11
- OnClick = Panel1Click
- end
- object Panel10: TPanel
- Left = 169
- Top = 41
- Width = 24
- Height = 24
- Hint = 'Red|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clRed
- ParentShowHint = False
- ShowHint = True
- TabOrder = 12
- OnClick = Panel1Click
- end
- object Panel12: TPanel
- Left = 192
- Top = 41
- Width = 25
- Height = 24
- Hint = 'Yellow|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clYellow
- ParentShowHint = False
- ShowHint = True
- TabOrder = 14
- OnClick = Panel1Click
- end
- object Panel11: TPanel
- Left = 217
- Top = 41
- Width = 24
- Height = 24
- Hint = 'Lime|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clLime
- ParentShowHint = False
- ShowHint = True
- TabOrder = 13
- OnClick = Panel1Click
- end
- object Panel15: TPanel
- Left = 240
- Top = 41
- Width = 25
- Height = 24
- Hint = 'Aqua|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clAqua
- ParentShowHint = False
- ShowHint = True
- TabOrder = 17
- OnClick = Panel1Click
- end
- object Panel13: TPanel
- Left = 265
- Top = 41
- Width = 24
- Height = 24
- Hint = 'Blue|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clBlue
- ParentShowHint = False
- ShowHint = True
- TabOrder = 15
- OnClick = Panel1Click
- end
- object Panel14: TPanel
- Left = 288
- Top = 41
- Width = 25
- Height = 24
- Hint = 'Fuchsia|'
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clFuchsia
- ParentShowHint = False
- ShowHint = True
- TabOrder = 16
- OnClick = Panel1Click
- end
- object GreenValue: TSpinEdit
- Left = 187
- Top = 89
- Width = 54
- Height = 26
- MaxValue = 255
- MinValue = 0
- TabOrder = 1
- Value = 0
- OnChange = BlueValueChange
- end
- object BlueValue: TSpinEdit
- Left = 128
- Top = 89
- Width = 54
- Height = 26
- MaxValue = 255
- MinValue = 0
- TabOrder = 0
- Value = 0
- OnChange = BlueValueChange
- end
- object RedValue: TSpinEdit
- Left = 246
- Top = 89
- Width = 54
- Height = 26
- MaxValue = 255
- MinValue = 0
- TabOrder = 2
- Value = 0
- OnChange = BlueValueChange
- end
- object ColorPanel: TPanel
- Left = 16
- Top = 25
- Width = 89
- Height = 88
- BevelOuter = bvLowered
- BorderStyle = bsSingle
- Color = clBlack
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 19
- end
- object Button1: TButton
- Left = 78
- Top = 160
- Width = 75
- Height = 25
- Caption = 'Ok'
- Default = True
- ModalResult = 1
- TabOrder = 20
- end
- object Button2: TButton
- Left = 174
- Top = 160
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 21
- OnClick = Button2Click
- end
- end
-